Imports System.ComponentModel

Public Class lkbl
    Inherits LinkLabel

    Private _TEXTLINK As String

    Public Property TextLink As String
        Get
            Return _TEXTLINK
        End Get
        Set(value As String)
            _TEXTLINK = value
        End Set
    End Property

    Private Sub lkbl_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles Me.LinkClicked
        System.Diagnostics.Process.Start(TextLink)
    End Sub
End Class
